home *** CD-ROM | disk | FTP | other *** search
- object frmWiz: TfrmWiz
- Left = 240
- Top = 161
- BorderIcons = []
- BorderStyle = bsDialog
- Caption = 'UltimateZip Wizard'
- ClientHeight = 358
- ClientWidth = 496
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnActivate = FormActivate
- OnCreate = FormCreate
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 13
- object Bevel: TBevel
- Left = 0
- Top = 313
- Width = 496
- Height = 2
- Shape = bsTopLine
- end
- object btnClose: TButton
- Left = 408
- Top = 328
- Width = 75
- Height = 25
- Cancel = True
- Caption = 'Close'
- TabOrder = 1
- OnClick = btnCloseClick
- end
- object btnNext: TButton
- Left = 323
- Top = 328
- Width = 75
- Height = 25
- Caption = '&Next >'
- Default = True
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- OnClick = btnNextClick
- end
- object btnBack: TButton
- Left = 248
- Top = 328
- Width = 75
- Height = 25
- Caption = '< &Back'
- TabOrder = 4
- OnClick = btnBackClick
- end
- object nbMain: TNotebook
- Left = 0
- Top = 0
- Width = 496
- Height = 313
- Color = clBtnFace
- ParentColor = False
- TabOrder = 5
- OnPageChanged = nbMainPageChanged
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabStart'
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 164
- Height = 313
- AutoSize = True
- Picture.Data = {<image000.bmp>}
- end
- object nbMessage: TNotebook
- Left = 164
- Top = 0
- Width = 332
- Height = 313
- Color = clWhite
- ParentColor = False
- TabOrder = 0
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabBegin'
- object Label1: TLabel
- Left = 16
- Top = 16
- Width = 205
- Height = 13
- Caption = 'Welcome to the UltimateZip Wizard!'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label2: TLabel
- Left = 16
- Top = 40
- Width = 297
- Height = 39
- AutoSize = False
- Caption =
- 'This Wizard automates the most common tasks involving archive fi' +
- 'les.'
- WordWrap = True
- end
- object Label11: TLabel
- Left = 16
- Top = 88
- Width = 232
- Height = 52
- Caption =
- 'This Wizard features:'#13#10#13#10'* Fast and easy zipping, updating, and ' +
- 'extracting.'#13#10'* Support for decoding UUE and XXE files.'
- end
- object Label10: TLabel
- Left = 16
- Top = 272
- Width = 259
- Height = 13
- Caption = 'Click "Next" to continue, or "Close" to exit the Wizard. '
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabEndEx'
- object Label5: TLabel
- Left = 16
- Top = 16
- Width = 188
- Height = 13
- Caption = 'The extract operation is finished.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label6: TLabel
- Left = 16
- Top = 40
- Width = 109
- Height = 13
- Caption = 'Files were extracted to:'
- end
- object lblDisplayIcons: TLabel
- Left = 16
- Top = 88
- Width = 275
- Height = 26
- Caption =
- 'The UltimateZip Wizard has opend a window showing the extracted ' +
- 'files.'
- WordWrap = True
- end
- object Label7: TLabel
- Left = 16
- Top = 272
- Width = 293
- Height = 26
- Caption =
- 'Click "Next" to work with another archive file, or click "Close"' +
- ' to leave the UltimateZip Wizard.'
- WordWrap = True
- end
- object lblExtractedTo: TPathLabel
- Left = 16
- Top = 56
- Width = 281
- Height = 13
- AutoSize = False
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabEndCreate'
- object Label3: TLabel
- Left = 16
- Top = 272
- Width = 293
- Height = 26
- Caption =
- 'Click "Next" to work with another archive file, or click "Close"' +
- ' to leave the UltimateZip Wizard.'
- WordWrap = True
- end
- object Label4: TLabel
- Left = 16
- Top = 16
- Width = 167
- Height = 13
- Caption = 'The Zip operation is finished.'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object Label17: TLabel
- Left = 16
- Top = 40
- Width = 278
- Height = 26
- Caption =
- 'Click the "Mail this archive file" button if you want to e-mail ' +
- 'your archive to someone else.'
- WordWrap = True
- end
- object Label18: TLabel
- Left = 16
- Top = 88
- Width = 295
- Height = 26
- Caption =
- 'Click the "UltimateZip Standard" button if you want to view the ' +
- 'contents of your new arcive.'
- WordWrap = True
- end
- object Button5: TButton
- Left = 102
- Top = 184
- Width = 129
- Height = 25
- Caption = 'Mail this archive file...'
- TabOrder = 0
- OnClick = Button5Click
- end
- end
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabBase'
- object Bevel1: TBevel
- Left = 0
- Top = 58
- Width = 496
- Height = 3
- Shape = bsTopLine
- end
- object Panel5: TPanel
- Left = 0
- Top = 0
- Width = 496
- Height = 58
- Align = alTop
- BevelOuter = bvNone
- Color = clWhite
- TabOrder = 0
- object lblTitel: TLabel
- Left = 16
- Top = 8
- Width = 409
- Height = 13
- AutoSize = False
- Caption = 'What do you want to do?'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- end
- object lblDis: TLabel
- Left = 32
- Top = 24
- Width = 393
- Height = 33
- AutoSize = False
- Caption = 'Click on the action you want to perform, then click Next.'
- WordWrap = True
- end
- object Image2: TImage
- Left = 440
- Top = 1
- Width = 55
- Height = 55
- Picture.Data = {<image001.bmp>}
- end
- end
- object nbOp: TNotebook
- Left = 0
- Top = 60
- Width = 496
- Height = 245
- PageIndex = 1
- TabOrder = 1
- OnPageChanged = nbOpPageChanged
- object TPage
- Left = 0
- Top = 0
- Caption = 'tacChoose'
- object Label19: TLabel
- Left = 16
- Top = 224
- Width = 259
- Height = 13
- Caption = 'Click "Next" to continue, or "Close" to exit the Wizard. '
- end
- object Label20: TLabel
- Left = 16
- Top = 16
- Width = 75
- Height = 13
- Caption = 'Do you want to:'
- end
- object rbCreate: TRadioButton
- Left = 16
- Top = 72
- Width = 225
- Height = 17
- Caption = '&Create a new archive (Zip archives only)'
- TabOrder = 1
- end
- object rbExtract: TRadioButton
- Left = 16
- Top = 40
- Width = 233
- Height = 17
- Caption = 'E&xtract all files from an existing archive file'
- Checked = True
- TabOrder = 0
- TabStop = True
- end
- object rbUpdate: TRadioButton
- Left = 16
- Top = 104
- Width = 257
- Height = 17
- Caption = '&Update an existing Zip archive (Zip archives only)'
- TabOrder = 2
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabSelArcEx'
- object Label22: TLabel
- Left = 16
- Top = 16
- Width = 71
- Height = 13
- Caption = '&Select archive:'
- FocusControl = edtArcName
- end
- object Label8: TLabel
- Left = 16
- Top = 224
- Width = 259
- Height = 13
- Caption = 'Click "Next" to continue, or "Close" to exit the Wizard. '
- end
- object btnBrowseEx: TButton
- Left = 210
- Top = 72
- Width = 75
- Height = 25
- Caption = 'B&rowse...'
- TabOrder = 0
- OnClick = btnBrowseExClick
- end
- object edtArcName: TEdit
- Left = 16
- Top = 40
- Width = 465
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 1
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabExtract'
- object Label23: TLabel
- Left = 16
- Top = 16
- Width = 97
- Height = 13
- Caption = '&Select extract folder:'
- FocusControl = edtExtractFolder
- end
- object Label9: TLabel
- Left = 16
- Top = 224
- Width = 270
- Height = 13
- Caption = 'Click "Extract" to continue, or "Close" to exit the Wizard. '
- end
- object edtExtractFolder: TEdit
- Left = 16
- Top = 40
- Width = 465
- Height = 21
- Color = clBtnFace
- TabOrder = 0
- end
- object cbOverwrite: TCheckBox
- Left = 16
- Top = 112
- Width = 129
- Height = 17
- Caption = '&Confirm file overwrites'
- Checked = True
- State = cbChecked
- TabOrder = 2
- end
- object cbDisplayIcons: TCheckBox
- Left = 16
- Top = 176
- Width = 177
- Height = 17
- Caption = '&Display file icons after extracting'
- Checked = True
- State = cbChecked
- TabOrder = 4
- end
- object btnBrowseEx2: TButton
- Left = 210
- Top = 72
- Width = 75
- Height = 25
- Caption = 'B&rowse...'
- TabOrder = 1
- OnClick = btnBrowseEx2Click
- end
- object cbFolderNames: TCheckBox
- Left = 16
- Top = 144
- Width = 153
- Height = 17
- Caption = 'Use stored folder names'
- Checked = True
- State = cbChecked
- TabOrder = 3
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabProgressEx'
- object Label24: TLabel
- Left = 16
- Top = 16
- Width = 77
- Height = 13
- Caption = 'Extracting files...'
- Visible = False
- end
- object lblFNExtract: TLabel
- Left = 16
- Top = 64
- Width = 50
- Height = 13
- Caption = 'Extracting:'
- end
- object prbExtract: TProgressBar
- Left = 16
- Top = 40
- Width = 465
- Height = 16
- Min = 0
- Max = 100
- Smooth = True
- TabOrder = 0
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tbSelArcAdd'
- object Label12: TLabel
- Left = 16
- Top = 16
- Width = 71
- Height = 13
- Caption = '&Select archive:'
- FocusControl = edtArcNameAdd
- end
- object Label13: TLabel
- Left = 16
- Top = 224
- Width = 259
- Height = 13
- Caption = 'Click "Next" to continue, or "Close" to exit the Wizard. '
- end
- object edtArcNameAdd: TEdit
- Left = 16
- Top = 40
- Width = 465
- Height = 21
- Color = clBtnFace
- ReadOnly = True
- TabOrder = 0
- end
- object btnBrowseAdd: TButton
- Left = 210
- Top = 72
- Width = 75
- Height = 25
- Caption = 'B&rowse...'
- TabOrder = 1
- OnClick = btnBrowseAddClick
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabAddFiles'
- object Label14: TLabel
- Left = 16
- Top = 224
- Width = 283
- Height = 13
- Caption = 'Click "Compress" to continue, or "Close" to exit the Wizard. '
- end
- object Label16: TLabel
- Left = 16
- Top = 16
- Width = 121
- Height = 13
- Caption = '&Selected files and folders:'
- FocusControl = lbList
- end
- object lbList: TListBox
- Left = 16
- Top = 40
- Width = 465
- Height = 129
- ItemHeight = 13
- MultiSelect = True
- TabOrder = 0
- end
- object btnAddFiles: TButton
- Left = 232
- Top = 184
- Width = 75
- Height = 25
- Caption = '&Add files...'
- TabOrder = 1
- OnClick = btnAddFilesClick
- end
- object btnAddFolders: TButton
- Left = 320
- Top = 184
- Width = 75
- Height = 25
- Caption = 'A&dd folders...'
- TabOrder = 2
- OnClick = btnAddFoldersClick
- end
- object btnRemove: TButton
- Left = 408
- Top = 184
- Width = 75
- Height = 25
- Caption = '&Remove'
- TabOrder = 3
- OnClick = btnRemoveClick
- end
- object ckbSubfolders: TCheckBox
- Left = 16
- Top = 184
- Width = 129
- Height = 17
- Caption = '&Include subfolders'
- TabOrder = 4
- end
- end
- object TPage
- Left = 0
- Top = 0
- Caption = 'tabProgressAdd'
- object lblAddName: TPathLabel
- Left = 16
- Top = 16
- Width = 465
- Height = 13
- AutoSize = False
- end
- object Label15: TLabel
- Left = 16
- Top = 16
- Width = 90
- Height = 13
- Caption = 'Compressing files...'
- end
- object lblFNAdd: TLabel
- Left = 16
- Top = 64
- Width = 63
- Height = 13
- Caption = 'Compressing:'
- end
- object prbAdd: TProgressBar
- Left = 16
- Top = 40
- Width = 465
- Height = 16
- Min = 0
- Max = 100
- Smooth = True
- TabOrder = 0
- end
- end
- end
- end
- end
- object btnHelp: TButton
- Left = 160
- Top = 328
- Width = 75
- Height = 25
- Caption = '&Help'
- TabOrder = 3
- OnClick = btnHelpClick
- end
- object btnUltimate: TButton
- Left = 16
- Top = 328
- Width = 129
- Height = 25
- Caption = '&UltimateZip Standard'
- ModalResult = 2
- TabOrder = 2
- OnClick = btnUltimateClick
- end
- object FormCenter1: TFormCenter
- Center = True
- Left = 224
- Top = 272
- end
- object odOpen: TOpenDialog
- Left = 312
- Top = 274
- end
- object odAddFiles: TOpenDialog
- Filter = 'All files|*.*'
- Options = [ofHideReadOnly, ofAllowMultiSelect, ofExtensionDifferent, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Title = 'Add files...'
- Left = 288
- Top = 268
- end
- object brdAddFolders: TdfsBrowseDirectoryDlg
- Title = 'Please select the folder you want to add.'
- Options = [bfDirectoriesOnly]
- StatusText = 'C:\WINDOWS\Desktop'
- Caption = 'Add folders...'
- ShowSelectionInStatus = True
- Left = 256
- Top = 268
- end
- object odOpenAdd: TOpenDialog
- DefaultExt = '.zip'
- Filter = 'Zip files|*.zip'
- Options = [ofHideReadOnly, ofPathMustExist, ofEnableSizing]
- Title = 'New archive...'
- Left = 400
- Top = 268
- end
- object brdExtract: TdfsBrowseDirectoryDlg
- Title = 'Please select the extract folder.'
- Options = [bfDirectoriesOnly]
- Caption = 'Extract to...'
- ShowSelectionInStatus = True
- Left = 352
- Top = 268
- end
- object odOpenAdd2: TOpenDialog
- DefaultExt = '.zip'
- Filter = 'Zip files|*.zip'
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist, ofEnableSizing]
- Title = 'Select archive...'
- Left = 424
- Top = 276
- end
- end
-